Set start to desired start when pixel scrolling to end of buffer

* lisp/pixel-scroll.el
(pixel-scroll-precision-scroll-down-page): Set start to desired
start when point cannot be moved further down.

diff --git a/lisp/pixel-scroll.el b/lisp/pixel-scroll.el
index 4aae166f2e064c393b59b018832d3d5374b640f7..223bc7fbc4739d7eba61d357960a007514e0670a 100644 (file)
--- a/lisp/pixel-scroll.el
+++ b/lisp/pixel-scroll.el
@@ -459,6 +459,7 @@ the height of the current window."
          (next-pos (save-excursion
                      (goto-char desired-start)
                      (when (zerop (vertical-motion (1+ scroll-margin)))
+                       (set-window-start nil desired-start)
                        (signal 'end-of-buffer nil))
                      (point)))
          (scroll-preserve-screen-position nil)